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This issue of AAL is late. No sooner do I warn you of one 
magazine that is behind in their publication schedule, than I 
get behind myself! We plan to catch up with the next issue. 


I just returned from 8 days in California. Some of you know 
that I am on the board of directors of the International Apple 
Core. After the board meeting I contacted a few long-time 
customers. I also attended the San Francisco Apple Corps Swap 
Meet. 


I looked up Peter Meyer, author of SDS‘s "Routine Machine"; 
together we had dinner at the home of Pat Caffrey, co-author of 
"Doubletime Printer", Peter is now working on the fourth 
volume of addifional Applesoft-extenders for his Routine 
Machine. I also spent two half-days with Henry Spragens, well 
known for his early contributions to Apple graphics lore. He 
bought his (first) Apple long ago in Kentucky, where he was one 
of the original members of LAUGHS (Louisville Apple User's 
Group for Hardware and Software!). Now he works at Beck-Tech 
in Berkeley, doing exotic things in the world of synthesized 
video graphics with the Apple and other machines. 


A few weeks earlier I spent the afternoon with DeWayne Van 
Hoozer in Houston, at the HAAUG meeting (you're right, it is 
pronounced "hog"!). DeWayne's Genasys project is nearing the 
publication stage, so you'll probably be hearing more about it 
soon. I am looking forward to some more time in Houston around 
Halloween, at the AppleFest there. Look me up if you are 
there, in or near the International Apple Core booth. 


Catalog Arranger ns - i ie Os & Morgan 


We all have the problem: a disk starts getting full, we delete 
some files to make space, and our new files (from our latest 
project) end up scattered all through the catalog. A disk that 
has been used for a few months ends up with a thoroughly 
shuffled catalog. 


There are programs available to alphabetize a catalog, but 
that's not always what I want to do. I want HELLO at the 
beginning, utilities next (assembler, text editor, ES-CAPE, 
disk zap, etc.), then various projects. The files for each 
project should all be grouped together, with the current job at 
the end of the catalog. 


I decided that what I want to be able to do is to "pick up" one 
entry in the catalog, move it to exactly where I want it, put 
it down, then go get another one and put that one in its place, 
and so on. Here's my program to do just that. 


Using Catalog Arranger 


First BLOAD CATALOG ARRANGER, then insert the disk you want to 
modify. When you type CALL 2051 (or 803G from the monitor) the 
disk will spin for a little while as the catalog is read into a 
sort of string array. The first 22 entries in the catalog will 
then be displayed, with the first entry shown in inverse. You 
may notice that deleted files are also displayed, with a minus 
Sign before the file type and a stray inverse character out at 
the end of the file name. Control characters are also 
displayed in inverse. 


The inverted entry is a cursor showing the “active entry". If 
you press the arrow keys, this cursor will move up and down the 
display. When the cursor reaches the center of the screen, it 
will stop moving and the display will scroll up and down around 
it. 


When you have the cursor on an item you wish to move, press 
RETURN. The word "MOVING" will appear in inverse in the lower 
left corner of the screen. When this “moving flag" is on, the 
entry in the cursor will be carried wherever the cursor goes, 
When it reaches the place where you want to put it, press 
RETURN again. The moving flag will disappear and that entry 
will stay where you just put it. 


There are a couple of other commands as well. Pressing the "B" 
key moves the cursor to the beginning of the catalog, and the 
"E" key moves it to the end. If the moving flag is on, the 
item in the cursor will be carried right along. There is also 
an "R*® command, to read in a new catalog. This is useful if 
you want to reread the current catalog and start all over 
again, or to move on to another disk. 


When you have the catalog arranged just the way you want it, 


press the "W" key to write the revised catalog onto the disk. 
Press ESC when you want to exit the program, 
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APPLE PERIPHERALS ARE OUR ONLY BUSINESS 


TIME! 
THE MOST POWERFUL, EASIEST TO USE CLOCK FOR YOUR APPLE 


@ Time in hours, minutes and seconds. 
@ Date with year, month, day of week and leap year. 


@ Will ennance programs for accounting. time and energy management, 
remote control of appliances. laboratory analysis, process control, 
and more. 


@ 24-hour military format or 12-hour with AM/PM indication. 


@ User selectable interrupts permit foreground/background operati 
of two programs simultaneously. 


@ Crystal controlled for 0005% accuracy. 
@ Easy programming in basic. 


@On board battery backup power tor over four months power off 
operation (battery charges when Apple is on). 
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@ Twenty-seven page operating manual included with many examples 


of programs to use with your Apple in any configuration. 


@ Inciudes disk containing a DOS Dater and many other time oriented 
utilities plus over 25 user contributed programs at no extra cost. 


PRICE $129.00 


SUPER MUSIC SYNTHESIZER 


@ Complete 16 volce music synthesizer on one card. Just plug it into 
your Appie, connect the audio cable (supplied) to your stereo and 
boot the disk supplied and you are ready to input and play songs. 

@ it’s easy to program music with our compose software. You will start 
nght away at inputting your favorite songs. The Hi-Res screen 
shows what you have entered in standard sheet music format. 


@We give you lots of software. In addition to Compose and Play 
programs, the disk is filled with songs ready to run. 


@ Easy to program in basic to generate complex sound effects. 

@ Four white noise generators which are great for sound effects. 

@ Plays music in true stereo as well as true discrele quadraphonic. 

@ Envelope control. 

@ Will play songs written for ALF synthesizer (ALF software will not 
take advantage of all the features of this board. Their software 
sounds the same in our synthesizer.) 

@ Automatic shutoff on power-up or if reset is pushed. 

@ Many many more features. 


PRICE $159.00 


ANALOG TO DIGITAL CONVERTER 


@Eliminates The Need To Wait For A/D 
Conversion (just PEEK at data) 


@ AID Process Totally Transparent to Apple 
(looks like memory) 


@8 Channels 

@ 8 Bit Resolution 

@ On Board Memory 

@ Ratiometric Capability 
@ Fast Conversion (.078 ms per channel) 


The analog to digital conversion takes place on a continuous, channel 
sequencing basis. Data is automatically transferred to on board 
memory at the end of each conversion. No A/D converter could be 
easier to use. 


Our A/D board comes standard with 0. 10V full scale inputs. These 
inputs can be changed by the user to 0, -10V. or -5V. +5V or other 
ranges as needed. 

The user connector has + 12 and -12 volts on it so you Can power your 
sensors. (These power sources can be turned off with on board dip 
switch). 

Accuracy 0.3% Input Resistance 20K Ohms Typ 
A tew applications may include the monitoring of @ flow @ 
temperature @ humidity @ wind speed @ wind direction @ light 
intensity ® pressure ® RPM @ soil moisture and many more. 


PRICE $129.00 


DIGITAL INPUT/OUTPUT BOARD 


@ Provides 8 buffered outputs to a standard 16 pin socket for standard 
dip ribbon cable connection. 


@ Power-up reset assures that ail outputs are off when your Apple i 
first turned on. 

@ Features 8 inputs that can be driven from TTL logic or any 5 volt 
source. 

@ Your inputs can be anything from high speed logic to simple 
switches. 


@ TOTALLY compatible with all CP/M software. 

@ Executes the full 2-80 and 8080 instruction set. 

@Aliows you torun your Apple CP/M based programs. 

@ Does EVERYTHING the other 2-80 boards do, plus supports 280 
Interrupts 

@ Hardware and software settable switch options. 

@ Anon-card PROM eli inates many I.C.’s for a cooler, less power 
consuming board. 

@ Complete documentation included. (user must furni 


@ Very simple to program, just PEEK at the data. 

@4 other outputs are aiso provided. User 1, reset. interrupt request, 
non-maskablie interrupt. 

@ Now on one card, you can have 8 digital outputs and 8 digital inputs 
each with its own connector The super input/output board 1s your 
best choice for any control application. 

PRICE $62.00 


2-80 CARD 


PRICE $139.00 


Since our inception Apphed Engineering has continually expanded t\s line of Apple peripherals bringing you easy-to-use designs 
We are the innovators not the imitators Utilizing slate-of the-art technologies Applied Engineering 1s continually improving its products The above represents our most 
recent development Applied Engineering offers you the highest quality peripherals at the lowest possibie price 
Appiied Engineering's products are tully tested with complete documentation and available for immediate delivery All products are guaranteed with a one year 
warranty 

Send Check or Money Order to: 


APPLIED ENGINEERING 
P.O. Box 470301 
Dallas, TX 75247 


See Your Dealer 
or Call (214) 492-2027 
7 Days a Week 
Master Card & Visa Wetcome 


All Orders Shipped Same Day. 
Texas Residents Add 5% Sales Tax. 


Add $10.00 if Outside U.S.A. 
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Catalog Organization 


If you are familiar with the internal structure of an Apple DOS 
catalog, you can skip ahead to the section labelled "How 
Catalog Arranger Works". 


The first step in reading a disk catalog is to read the VTOC 
(Volume Table of Contents), which iS always located at track 
$11, sector 0. The second and third bytes in the vTOC (offsets 
1 and 2) contain the track and sector of the start of the 
catalog. On a standard DOS 3.3 disk these always point to 
track $11, sector SOF, and the rest of the catalog is always on 
track $11. These locations can be changed, however. For 
example, some programs to convert DOS 3.2 disks to DOS 3.3 
leave the first catalog sector at track $11, sector SOC. 
Therefore, it is safest to follow the pointers rather than 
assuming that the catalog will always be in its usual place. 


In a catalog sector, the first byte is not used. The second 
and third bytes point to the next track and sector of the 
catalog. If the track byte is zero, it means that there is no 
next sector, this is the end of the catalog. The fourth 
through the eleventh bytes are not used. The actual catalog 
information starts at the twelfth byte of the sector (offset 
$B) and fills the rest of the sector. Each catalog entry takes 
35 bytes, so there are 7 entries in each sector. 


The first two bytes of an entry contain the track and sector of 
the file's track/sector list. If the first byte is S$FF, the 
file has been deleted. In that case, the track number has been 
moved to the end of the file name. If the first byte is zero, 
this entry has never been used, and we are past the end of the 
catalog. 


The third byte tells the file type and whether the file is 
locked. Here are the type codes: 


00 -- TEXT file 

01 -- INTEGER BASIC program 

02 -- APPLESOFT BASIC program 

04 -- BINARY file 

08 -- S file -- not used 

10 -- R file -- DOS Toolkit relocatable object file 
20 -- A file -- Lazer Pascal source file 

40 -- B file -- Lisa assembler source file 


If the file is locked, $80 is added to the type code. 


The next 30 bytes are the file name. If the name is less than 
30 characters long, it is filled out with spaces (ASCII SAO). 


The last two bytes are the length of the file, in sectors. 
This is expressed as first low byte, then high byte. 


Page 4....Apple Assembly Line....October, 1982....Copyright (C) S-C SOFTWARE 


Limitations and Additional Features 


There are a few points that need more work: 


Disk error handling. The program just prints "I/O ERROR" 
and stops. It needs a real error handler. 


This program will handle catalogs with up to 127 entries. 
A standard disk has no more than 105, but some catalogs 
are modified to have more. 


I plan to add several more commands to Catalog Arranger: 
Alphabetic sort. This would be useful too, maybe just 


from the cursor to the end of the catalog. That would 
keep the utilities in place at the beginning. 


Sort by file type. 
Delete and undelete files. 
Move deleted files to the end. 


Rename files by editing the file name in the cursor. That 
would be a lot easier than typing entire file names twice, 
as RENAME requires. 


Display and allow changing the values of SLOT and DRIVE. 


Display the value of ACTIVE.ELEMENT and NUMBER.OF.ENTRIES, 
and maybe free sectors on the bottom line. 


Write the catalog out to the disk as a text file. 


Adding many of these features would also require reworking the 
command structure (which wouldn't hurt anyway!) 


Here iS a summary of the commands: 


B -- Move the cursor to the beginning of the catalog. 
E -- Move the cursor to the end of the catalog. 
R -- Read the catalog from the disk. 
W -- Write the catalog to the disk. 

--> -- Move the cursor down one item. 

<-- -- Move the cursor up one item. 

RETURN -- Toggle the moving flag on or off. 
ESC -- Exit the program. 
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Here's a diagram: 


0 1 2 3. 6. « « 32 33 34 


[arash [sector [owre [vene -J¢- [em me [own 


You can find more information on the structure of the catalog 
in the DOS Manual on pages 129-134 or in the book Beneath Apple 
DOS on pages 4-4 through 4-7. It is impossible to recommend 
Beneath Apple DOS too highly; if you have any interest in the 
internals of DOS, get that book. 


How Catalog Arranger Works 


After initialization, the program builds a table of pointers 
into the storage area. We can build this table in advance 
because we know that all entries will be the same length. The 
catalog is then read into the array, each entry being placed 
according to the next pointer in the table. The end of the 
table is then marked with two zero bytes after the last element 
used. 


The next step is to display the entries in the array. The 
display routine starts by checking ACTIVE.ELEMENT to see 
whether to start the display with the first element, or 
somewhere in the middle. It then scans up the table, 
displaying each catalog entry and inverting the one 
corresponding to ACTIVE.ELEMENT. The routine that actually 
displays each Jine borrows a couple of subroutines in DOS to 
decode the file type and display the file size. 


When MOVING.FLAG is off, the arrow, B, and E commands simply 
change the value of ACTIVE.ELEMENT. When MOVING.FLAG is on, 
the arrows swap entries in the table up or down, and B and E 
repeatedly swap entries to move ACTIVE.ELEMENT to the beginning 
Or end. 


When writing the catalog back onto the disk we have to be 
careful to put the catalog sectors back in the same place they 
came from, Since we can't assume that the catalog came from 
track $ll. We do this by reading the first catalog sector into 
the buffer, scanning up the pointer table and moving the 
indicated entries into the catalog buffer, and then writing the 
buffer to the same disk sector it came from. We then get the 
track and sector pointers (which haven't been changed) from the 
buffer and use them to read the next sector. This whole 
process ends when we run out of entries in the pointer table. 
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CAN YOU PROGRAM YOUR SERIAL CARD? 
NOW YOU CAN. 


The SPI card gives your APPLE II* 
computer a new dimension to serial I/O: gil 
firmware on RAM. This allows you to adapt ae 

the SPI to virtually any RS-232 serial device. 
It gives you total control. 


BSAVE your SPI programs on disk. Then 
BLOAD the one you want directly into the 
SPI RAM. Anytime. Even on boot-up. 


Control characters select the various 
features and modes: dumb terminal, [#% iy 
remote computer, and printer interface. is ™ : Zl 
However, if you like to customize your 

firmware or have an unusual device to Yo HAVE TOTAL CONTROL 
operate, well-documented source list- ¢ Firmware in 2K x 8 static RAM. 


ings are included. e Control CTS, DSR, DTR, RTS, RLSD. 
Now the frosting. The SPI RAM can be ® Control baud rate, word length, 
used to store machine language routines __ parity, etc. 

and utilities safely out of main memory. It's » Programs supplied for: RAM test 


Sew Way toUse Derpnere memory, UART, terminal mode, remote mode 
The SPI costs only $99.80 including5'cable —_ printer mode. | | 
and documentation. For longer cable ¢ 

lengths add $1.00 per foot. | year warranty. 

* APPLE is a trade mark of Apple Computer Inc. 


FM PANATRONIGS.... 


Box 1088 Stone Mountain, GA 30086 


PRICE: $99 50 * L_] Check or Money Order LIVISA OC MasterCard 


POST PAID 
CARD NO. 


*Georgia residents please add 
3% state sales tax and local 
sales tax if applicable. Postage 
prepaid inside continental U.S. AUTHORIZED SIGNATURE 
(outside U.S. add $5.00). All 

payments must be made in U.S. NAME (please print) 

dollars. Please allow 4 to 6 


weeks for delivery. ADDRESS 


EXPIRATION DATE 


CITY 


STATE 
FM PANATRONICS. Box 1088, Stone Mountain, GA 30086 
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MACHINE LANGUAGE SPEED 
wvper~ Magic, iC WHERE IT COUNTS... 


For the first time, Amper-Magic makes it easy for people who don’t know 
machine language to use its power! Now you can attach slick, finished machine 
language routines to your Applesoft programs in seconds! And interface them 
by name, not by address! 


You simply give each routine a name of your choice, perform the append pro- 
cedure once at about 15 seconds per routine, and the machine language becomes a 
permanent part of your BASIC program. (Of course, you can remove it if you want to.) 


Up to 255 relocatable machine language routines can be attached to a BASIC 
program and then called by name. We supply some 20 routines on this disk. More 
can be entered from magazines. And more library disks are in the works. 


These routines and more can be attached and accessed easily. For example, 
to allow the typing of commas and colons in a response (not normally allowed in 
Applesoft), you just attach the Input Anything routine and put this line in your program: 


x00, PRINT “PLEASE ENTER THE DATE.”; : & INPUT,DATES 


&-MAGIC makes it Easy to be Fast & Flexible! 
PRICE: $75 


&-Magic and Amper-Magic are trademarks of Anthro-Digital, Inc. 
Applesoft is a trademark of Apple Computer, Inc. 


IN YOUR PROGRAM! 


Some routines on this disk are: 


Binary file info 

Delete array 
Disassemble memory 
Dump variables 

Find substring 

Get 2-byte values 
Gosub to variable 
Goto to variable 

Hex memory dump 
Input anything 

Move memory 
Multiple poke decimal 
Multiple poke hex 
Print w/o word break 
Restore special data 
Speed up Applesoft 
Speed restore 

Store 2-byte values 
Swap variables 


Anthro - Digital Software 


P.O. Box 1385 
Pittsfield, MA 01202 


The People - Computers Connection 
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ANMIPERWARE 


THE ULTIMATE ENHANCEMENT TO APPLESOFT™ BASIC 


There are a number of Applesoft enhancement packages on the 
market which use the ampersand reserved word to gain access to 
assembly language routines from BASIC. None can match the ease 
of use, speed or powerful features of Amperware. Just BLOAD 
AMPERWARE and you have access to an extended I[nstruction set 


which willl make your programs smaller, faster, more professlonal 
and easier to write. No knowledge of assembly language Is 
required and there are not POKEs, PEEKs, CALLS or |IimIitations on 


variables. 


—— FEATURES ——— 


FLEXIBLE DATA ENTRY -- The &INPUT command allows rapld creation 
of video forms with IIne editing (Insert/delete character, clear 
to end, etc.), upper/lower case and numeric error checklIing. 
Control codes handiiIng Is easy wlth the &ON CTRL GOTO statement. 


RAPID DISK 1/0 -- Read or write numeric or string Information to 
the disk Is binary up to 20 times faster than [In BASIC. Compact 
storage format saves 25-75% of disk space. &READ/&WRITE whole 
arrays or even IIsts of arrays with one statement. 


FORMATTED OUTPUT -- &PRINT WITH will print [In regular, 
exponential or accounting format (negative In parentheses). 
Complete control of: significant digits; decimal sign; dollar 
sign; comma placement; fill characters (blank, zero or asterlIsk). 
Handles text In the format and wlll place text Into format 
flelds with right/left justification or centering. 


MANY OTHERS -- Sort 8-10 times faster (direct or Indexed); delete 
arrays; rapid substring search; GOTO/GOSUB to computed IlIIne 
number; simple text window control; hardware Independent cursor 
and screen control; etc. 


ALL THIS FOR ONLY $49.95 
add $1.50 shipping and handling 


SCIENTIFIC SOFTWARE PRODUCTS, INC. 
3171 Donald Avenue 
indianapolis, IN 46224 


IN residents add 4% tax VISA and MC accepted 
* Applesoft Is a trademark of Apple Computer Co., Inc. 
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5720 MOVE. ELEMENT. DOWN 
OBOD- AD 36 OB 2730 LDA ACTIVE.ELEMENT 
OB10- OA 5740 ASL 
OBi2- AO 0 27 2O LDY #2 
OB ih. BD 95 OD 5170 1 LDA ARRAY. TABLE, X 
OB1T- 7 
OB IO. BD 36 OD 5790 LDA ARRAY.TABLE~2,X 
OB1B- ap 38 OD 5800 STA ARRAY.TABLE,X 
OB1E- 5810 PLA 
OBIF- 9p 36 OD 5820 STA ARRAY .TABLE-2,X 
OB22- 
OB23- 88 at DEY 
OB24- DO EE 5850 BNE .1 
OB26- 60 ait ; RTS 

6 2890 BOT VERSE "MOVING" 
OB27T- OD OF 1 
He 09 OE 07 5900 . .HS ODOF16090E07 
OB2D- 2320 SLOT BS 1 USUALLY 6} 
OB2E- 5930 DRIVE BS 1 USUALLY 1 
OB2F- 5940 VOLUME .BS 1 O = ANY) 
0B30- 5 20 TRACK .BS 1 USUALLY $11) 
B31 — 23 0 SECTOR .BS 1 0 T0 F 
OB32- 5970 BUFFER .BS 2 (VARIES 
OB3 i — 5980 COMMAND .BS 1 1 OR 2 
0 

0B35- 2880 NUMBER.OF.ELEMENTS .BS 1 1 TO N) 
0B36- 6010 ACTIVE.ELEMENT .BS 1 0 TO N-1) 
OB are 6020 MOVING. FLAG -BS 1 0 OR FF) 

030 #-------------- + - - -e -  ee ee e 

E040 END.OF. PROGRAM 

050 
0B38- £080 VTOC. BUFFER .EQ END.OF. PROGRAM 
0C38- 6070 CATALOG. BUFFER .EQ END.OF.PROGRAM+$100 
Ete 6080 ARRAY.TABLE -EQ END.OF. PROGRAM+$200 
0E38- 6090 CATALOG. ARRAY .EQ END.OF. PROGRAM+$300 


- —) 
WRITE NOW 


Southwestern Data Systems, an industry pioneer in innova- 
tive software for the Apple Il, is aways looking for authors. There 
are no limitations on the size or type of software you can 
submit — utilities, Communication, business, education, or 
games — the only requirement is that it must meet the quality 
standards which typify all SOS products. When you join the SDS 
team, you get the benefits of a professional support staff 
experienced in providing all you need to get your program to 
market. Here are some of the ways we help you: 


®@ TECHNICAL PROGRAMMING ASSISTANCE 

@ UNIQUE COPY PROTECTION W/LIMITED BACKUPS 
@ SUCCESSFUL MARKETING STRATEGIES 

@ ASSISTANCE IN WRITING THE MANUAL 

@ PROFESSIONAL PRODUCT ARTWORK 

@ QUALITY ADVERTISING 

@ SUPERIOR PACKAGING 

@ NATIONAL DISTRIBUTION 

@ HIGHEST ROYALTIES PAID MONTHLY 

@ CUSTOMER SERVICE SUPPORT 


This is the opportunity you have been waiting for, a chance 
to market your program with the finest publisher in the soft- 
ware industry. Let Southwestern Data Systems’ reputation and 
proven track record for success go to work for you. If you think 
you have what we want — a unique and distinctive software 
package — please call or write us today! 


soutmwesternn data systems 
P.O. BOX 582 = SANTEE. CA 92074 (714) 562-3670 
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So You Never Need MacCroS!..eccccccccvceceeee DUD Sander-Cederlof 


I have said it many times myself, "I don't need macros!" But 
now that I have them, I seem to find more and more uses for 
them. Not the traditional uses, to generate common sequences 
of opcodes. I am using them to build tables of data, rather 
than typing in line after line of very similar stuff. 


I have been working some more on the Prime Number Generator 
program. You may remember the series: first the articles in 
BYTE Magazine, then my faster version in an early Apple 
Assembly Line, then Charles Putney's version at double my 
speed. Now Tony Brightwell has cut Charlie's time nearly in 
half. (HiS program will probably appear next month.) Anyway, 
I have done some more investigation. 


One approach required a precomputed table of the squares of the 
odd numbers from 1 to 127. An easy way to enter this table 
might be: 


-DA 1*1,3*3,5*5,7*7,9*9 
~—DA 11*11,13%*13,15*15,17*17 
et cetera 


I had type about that much when I said, "There has to be an 
easier way." I made up the following macro definition: 


-MA SQ 

-EQ Jl 

-EQ J1+2 

-EQ J1+4 

-EQ J]1+6 

-EQ J1+8 

-EQ J1+10 

-EQ J1+12 

~-EQ J1+14 

-DA :0%*:0,:1*:1,:2%*:2,:3%*33 
~—DA 2:4%34,:5%*:5,:6*:6,37%*37 
~-bDO ]2<8 

>SQ J1+16,]2+1 

FIN 

. EM 


SN Om WN He! © 


Then the single line of code 
2200 >»SQ 1,1 
generated all 64 squares for me. 


How does it work? Good question.... The eight .EQ lines 
create 8 private labels with the values of 8 consecutive odd 
numbers starting with whatever the first parameter from the 
call line happens to be. Line 2200 has the first parameter 
"1", so the private labels will have values of 1, 3, 5, 7, 9, 
ll, 13, and 15 respectively. The two .DA lines generate the 
squares of these 8 values, 
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The next three lines are the tricky part. If the second 
parameter hasS a value less than 8 then the line between .DO and 
-FIN is assembled. It is a nested call on the SQ macro. Only 
this time the first parameter is 16 greater than it was, and 
the second parameter isS one greater. After going through this 
nesting process 7 times, we will have generated 8 sets of 8 
values each. When the second parameter has worked its way up 
to 8, the nested calls will exit in turn, and the table is 
finished. 


If you have the macro expansion listing option on during 
assembly, the expanded form takes 2 1/2 pages. 


DISASM (Version 2.2) $30.00 
Use DISASN, the intelligent disassembler, to convert 6502 machine code into meaningful, symbolic source. 
It creates a text file which is directly compatable with DOS ToolKit, LISA and S-C (both 4.0 & Macro) 
Assemblers. Use DISASM to customize existing machine language programs to your own needs or Just to see 
how they work. DISASH trandles multiple data tables, invalid op codes and displaced object code (the 
program being disassembled doesn’t have to reside in the memory space in which it executes). DISASN lets 
you even substitute MEANINGFUL labels of your own choice (100 commonly used Monitor & Pg Zero names 
included in Source form to get you rolling). The address-based cross reference table option results in 
peither a selective or complete cross reference (to either screen or printer). Page Zero and External 
references are listed separately in numeric order. The cross reference table provides as much insight 

into the inner workings of machine language programs as the disassembly itself. DISASM has proven to be 
an invaluable aid for both the novice and expert alike. 


Utilities For Your S-C Assembler (4.0) 
SC.6SR: A Global Search and Replace Eliminates Tedious Manual Renaming Of Labels. 
SC.XREF: A Linenumber-Based Global Cross Reference Table For Complete Source Documentation......$20.00 
SC.TAB: Tabulates Source Files Into Neat, Readable Form. Encourages Fast, Free-Format Entry....$15.00 
SC UTILITY PAK: Includes All Three Utilities Described Above (You Save $10.00).....sscscsescesne 


All of the above programs are written entriely in machine language and are provided 
on a standard 3.3 DOS formatted diskette. 


Avoid A $3.00 Shipping/Handl ing Charge By Mailing Full Payment With Order 
RAK -WARE 
41 Ralph Road 
West Orange NJ 07052 


#aetx SAY YOU SAW IT IN ‘APPLE ASSEMBLY LINE’! snaus 
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S&H Software 


is Speeding up The Apple ! 


The DOS Enhancer (TDE) 
works up to 500% faster than 
standard Apple DOS 3.3...$69.95 


TIRED OF WAITING. .foryour programs to load or 
save? Then S&H’s TDE, licensed by Apple, is the 
answer. 

TOE program updates standatd Apple DOS 3.3 disks of Creates 
copyable TOE disks with TDE’s QuickDOS and Quick load features 

TDE’'s QuickDOS tuns and saves BASIC and binary programs up to 
limes taster’ and 1s completely compatible ith standard Apple DOS 33 
programs 

TDE ‘Quick loads’ the RAM card with F PBASIC/ 
uset program in 1 7 seconds at startup 

TDE “package” includes utility disk. training/support disk, step-by-step 
instruction manual. S&H's Supercat/menu, and muttidrive “Quick-copy” 
program. 

TDE system requirements 48K Apple |[ or |[ + ROM/RAM card, DOS 33 
and one of more disk drives 


QuickDOS or 


Here’s what the critics say: 


@John Mitchener of PEFLINGS Il “The speed increase with TDE 1s 
awesome and 's probably worth the price of the program alone without all the 
other features AA taling 


@Val Golding Editor of Call APPLE °“(TDE) stands as a shining exam 
ple of how utility and apphcation programs take into account every possible sys 
tem contiguration 

@ Clark Congleton of The Apple Orchard = The Quick-load capabilities will 
make this package attractive to anyone who spends a lot of time at the 
keyboard 

@ Chuck Carpenter of (INFOWORLD “Results ina disk that 
fast in any Apple system 


Amper-Sort/Merge (A-S/M 11) 
works up to 1000% faster than even 
VisiCorp’s VisiFile program...$69.95 


A-S/M this the fastest “tle clerk” you've ever tnet Of all the sort utdeties 
developed to manage Apple || data files none does the job neatly so 
fast as A S/M I! 

A-S/M I's new features include S&H's superfast Visif ile index sort 
(Callable from: within Visi ite for effortless use), an equally fast S&H random 
access file index sort. and parameter tile editing 

A-S/M (can sort/merge trom one to five unsorted tes into a single file at 
up to 125K in size per disk 

A-S/M IPS package” ncludes utility disk. traning disk, step by step 
mstuchon manual and S&H's new Supercat/menu 

A-S/M It's system requirements 48K Appte || with ROM of BAM ¢. 

ABK Apple || + with DOS 33 and Disk U 


S&H 
Sottware 


4 
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Decision 
Decision Systems 


S P.O. Box 13006 
ystems Denton, TX 76203 
817/382-6353 


DIS-ASSEMBLER 


DSA-DS dis-assembles Apple machine language programs into forms 
compatible with LISA, S-C ASSEMBLER (3.2 or 4.0), Apple's TOOL- 
KIT ASSEMBLER and others. DSA-DS dis~assembles instructions or 
data. Labels are generated for referenced locations within the 
machine language program. 

$25, Disk, Applesoft (32K, ROM or Language card) 


OTHER PRODUCTS 


ISAM-DS is an integrated set of Applesoft routines that gives indexed file capabilities 
to your BASIC programs. Retrieve by key, partial key or sequentially. Space from 
deleted records is automatically reused. Capabilities and performance that match 
products costing twice as much. 

$50 Disk, Applesoft. 


PBASIC-DS is a sophisticated preprocessor for structured BASIC. Use advanced 
logic constructs such as IF...ELSE..., CASE, SELECT, and many more. Develop 
programs for Integer or Applesoft. Enjoy the power of structured logic at a fraction of 
the cost of PASCAL. 

$35. Disk, Applesoft (48K, ROM or Language Card). 


FORN-DS is a complete system for the definition of input and output froms. FORM- 
DS supplies the automatic checking of numeric input for acceptable range of values, 
automatic formatting of numeric output, and many more features. 

$25 Disk, Applesoft (32K, ROM or Language Card). 


UTIL-DS is a set of routines for use with Applesoft to format numeric output, selec- 
tively clear variables (Applesoft's CLEAR gets everything), improve error handling, 
and interface machine language with Applesoft programs. Includes a special load 
routine for placing machine language routines underneath Applesoft programs. 

$25 Disk, Applesoft. 


SPEED-DS is a routine to modify the statement linkage in an Applesoft program to 
speed its execution. Improvements of 5-20% are common. As a bonus, SPEED-DS 
includes machine language routines to speed string handling and reduce the need for 
garbage clean-up. Author: Lee Meador. 

$15 Disk, Applesoft (32K, ROM or Language Card). 


(Add $4.00 for Foreign Mail) 


*Appie Il is a registered trademark of the Apple Computer Co. 
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Converting ToolKit Source to S-C...........Beo Sander-Cederlof 


I had the source code for FIG-FORTH on the Apple, entered by 
some members of the Dallas Apple Corps. For some reason they 
decided to use the DOS ToolKit Assembler when they typed in all 
those lines. Naturally, I had a strong desire to convert the 
source files to the format of my S-C Macro Assembler. 


The first step, and one of the easiest in this case, is to 
figure out how to read the ToolKit source files into S-C. 
ToolKit source files are standard DOS text files (type "T"). 
There are no line numbers. S-C allows such files to be read in 
by typing the following commands: 


NEW 

AUTO 

<<<<<EXEC filename (where "<" stands for backspace) 
<<<<<MANUAL 


"NEW" makes sure there are no lingering program lines from a 
previous load. "AUTO" starts generating automatic line 
numbers. The first line number generated will be 1000. Five 
backspaces will back up the cursor to the beginning of the 
input line, so the EXEC command can be typed. As the file is 
EXECing, each line will be read in with a prefixed line number. 
After the whole file has been read, five backspaces allow you 
to type the "MANUAL" command, thereby turning off the AUTO 
mode. 


At this point you can LIST the program in memory and see what a 
ToolKit file looks like when you are using the S-C editor. You 
could use the EDIT and REPLACE commands to make all the 
necessary changes, and SAVE the converted program on a new 
file. 


I was able to automate much of the conversion process, uSing an 
EXEC file of REPLACE commands. Several of you readers, 
including Graeme Scott of DFX fame, have sent me similar EXEC 
files for converting LISA source code, 


Before I lay out the whole file, lets look at a simple case, 
The people who typed in the ToolKit source decided to separate 
individual sections of code with "SKP 1" lines. This causes a 
blank line on the assembly listing. S-C does not have an 
equivalent directive, but then again I personally don't like 
blank lines on my listings. (They always make me think my 
printer is broken!) Anyway, the command REP / SKP 1/*/A 
replaces all of the skips with empty comment lines. If you 
don't even want to see the asterisk on the line, use REP / SKP 


1/ /A. 


Notice that there is one space before "SKP" in the command 
above. ToolKit uses space as a tab character, and so the 
source file does not have nice neat columns for each field. If 
you list it with a regular text editor, the opcode field winds 
around like a snake; it always starting one space after the 
label, or in column 2 if there is no label. S-C uses control-I 
for a tab character, because control-I is the ASCII tab 
Character. More on this later, 
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There were also a number of SKP 2" lines. I decided to turn 
these into "*-------- " lines, to indicated a greater separation 
than a mere empty comment line would. 


ToolKit uses the semi-colon in column 1 to indicate a comment 
line; S-C uses an asterisk. ToolKit also uses a semi-colon to 
begin a comment field on a source line; S-C does not require 
any such character. The following two replace commands will 
Make the necessary changes: 


REP / ;/ /A 
REP /;/*/A 


The commands have to be in that order, or else you end up with 
an asterisk starting comment fields when they aren't necessary. 
Two lines had ";" in as ASCII literal constant. I had to 
hand-re-correct them later. 


The most important changes are the directives. The files I was 
converting needed the following changes: 


REP / EQU / .EQ /A 
/ DW / .DA /A 
/ ORG / .OR /A 

REP / DS / .BS /A 
/ DCI / .AT /A 
/ DFB / .DA #/ 
/ ASC / .AS / 


REP 
REP 


Immediate address mode also presented a problem. ToolKit uses 
the form "LDA #<SSS" to indicate the high byte, and "LDA #>SSS" 
to indicate the low byte. S-C uses "LDA /SSS" for the high 
byte, and "LDA #SSS" for the low byte. I fixed them with: 


REP " <#" /"A 
REP " >#" #"A 


Now about those snaky columns.... I wanted to somehow put a 
tab before each opcode field, and before each comment field. I 
thought, "Why not just use the replace command to put ina 
control-I?":;: 


REP / EQU /“I.EQ /A (where “I means I typed control-I) 
et cetera 


My first problem was that typing controll-I when entering the 
REPLACE command made a tab. I overcame that by typing the 
sequence "control-O control-I". Control-O makes the next 
character become part of the input line regardless of its 
normal meaning. That worked, but.... 


My second problem was that getting a control-I into the source 
program did not make it a tab. Somehow the control-I had to be 
"executed". So I wrote the converted program on a text file, 
this time with line numbers, and then EXECed it back in. 


TEXT# filename 
EXEC filename 
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| Vike 
fhe most 
controversial 


computer . 
Mageseine 


——)) 


“HARDCORE Computing warns pirates 
about the latest technology that companies 
are using against them." TIME, Feb. 8, 1982 


heard 
about the boycoft (of bit-copy ads), they con- 
cluded that it was nothing but censorship and 
another example of the magazines ignoring 
the average Apple user to placate their adver- 
tisers. So they started their own publication, 
HARDCORE Computing  "’ ESQUIRE, Jan. 1982 


what is hardcore computing ? 


its a HOW TO” guide for users 


“When some Apple enthusiasts 


| How To Write Your Own Data Base 
about : a Using text files and Oe 
ALLing routines from 

DOS source listings of special DOS routines 
applesoft tricks ‘n treats PEEKS 
ampersand (&) utilities ad 


subroutine master library POKES 
plus... 


Lots of complete program listings from the 
HARDCORE Program Library of copyable software 


USeotnling)ooe 


"4 All About Graphics! 
Program Utilities. 
Games ? 


oy: A tou Sieh te PPS 
be hah lal | At vara . wee 
epee, vege oe GAP: ore ou 
. PLN ee 


HardCore Computing is a quarterly magazine. 


Apple Assembly Line....October, 1982....Copyright (C) S-C SOFTWARE... 


/ 
A 


-— 


ardcore. 


the 
censored 
secrets 
behind 
the 
methods |?_ 


and K | 
madness 

of ‘ 
commercial aie 
COPY-PROTECTION! | 
ALSO HOW TO: 

Market your software. 
Copy-protect your disks. 
Normalize altered D.0.S. 

Use bit-copiers to make back-ups. 


PLUS Game, Utility, Business, 
Educational program listings. 


For serious 
Apple computerists! 
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But... 
When I EXECed the 


the control-I's were executed 
I had to change my replace commands to include 


both a control-O and a control-I, so that the control-I in the 
REPLACE command would be read in from the EXEC file but not 


If not, keep reading anyway, because I will 


executed until it was later EXECed from the temporary source 
show you what I mean. 


commands as an EXEC file, so that I did not have to manually 
text file. 


That "executed" the control-I's, and I had tabs. 
My third problem was that I wanted to save all the REPLACE 


retype them for every file to be converted. 
Using S-C, I entered the following "program" 


REPLACE command file, 


immediately! 
Still with me? 


KG eh ee ee EE 


~~ Re es SS fx) 
GG eG eh ee a ae ee a ed eh eh ae eh ee ee wa] 
964 QO i 10 2 2) MRR RRS aan 
Eat Ee hs SE Rd SO) CE EOI DS Dt 4 0, et eg OY) © se OD (xs 
1202 9000) AQ MA AO A AQ 0 9 0) df) BO OM) ed Hf] i ee) DS Dd 
HRS HH Re HHA he HRM OO OOQWHW ZO Om OD BE) A. 
© Ow eh ed Bd ad Bd ed dd ad ed ad ad a tt 4 4 Fn] = 
eleleleleleleolelolololo OU a: ax Om On Oe OE OE Ot Ot Ok Ok el 


he oe OL el el eleleoleleleloleloleleololololeolololo! Ea» 
PPM ROCCO RRRSRERC ESRC R CS 
A SS SRR RRR SR SR RR SRS 
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In the listing above, I have used "0" to mean "control-O"; 

"“I" to mean "control-I"; and "*“[" to mean "ESCAPE key". In 
order to get "control-O control-I" in a line, I had to type 

"control-O control-O control-O control-I". 


Lines 1000-1030, 1080,1130, 1170,1690, and 1720 begin with a 
quotation mark. These are comment lines to the S-C input 
routine; they print on the screen when they are read from the 
EXEC file, but are otherwise ignored. 


I saved the file as is using "SAVE TOOLKIT CONVERTER", in case 
I might want to modify it again. And I did, again and again 
and again. Then I wrote it on a text file without line numbers 
using "TEXT TKC", 


Here is the sequence of steps I went through for each source 
file: 


NEW 

AUTO 

1000 * filename 

<<<<<EXEC filename ,D2 (where "<" means "backspace”") 
<<< <<MAN 

EXEC TKC,D1 

EXEC F 

LIST 1000 (to see what filename to use) 
SAVE filename 


There are three EXEC commands above; the first reads on the 
ToolKit source file; the second executes all the REPLACE 
commands, and writes the resulting source on a temporary text 
file named "F"; the third reads in that temporary text file to 
"execute”™ the control-I tabs and the "“ESC-L" lines. 


After all the files were converted, I built a little assembly 
control file like this: 


1000 IN FILE1 
1010 IN FILE2 
et cetera 


I also added a ".TF" directive after the ".OR" line, to put the 
assembled code on a DOS binary file. 


The first assembly did not go smoothly, because of lines 
containing "ROR A". In the four shift instructions, ToolKit 
requires the symbol "A" to signify Accumulator mode. S-C uses 
a blank operand field to signify Accumulator mode, and thinks 
"ROR A" means to shift the memory location labeled "A". 


Once I was able to assemble with no errors, I compared the 
object code produced with that produced by ToolKit. They did 
not match! There were two lines in the ToolKit source causing 
the problem: 


DW LIT, SFFFF 
L1495 DFB $C1,$DB 


Apple Assembly Line....October, 1982....Copyright (C) S-C SOFTWARE....Page 25 


QuicKkTRACE 


relocatable program traces and displays the actual machine operations, while it is running 
without interfering with those operations. Look at these FEATURES: 


Single-Step mode displays the last instruction, 
next instruction, registers, flags, stack contents, 
and six user-definable memory locations. 


Trace mode gives a running display of the Single- 
Step information and can be made to stop upon 
encountering any of nine user-definable 
conditions. 


Background mode permits tracing with no display 
until It is desired. Debugged routines run at near 
normal speed until one of the stopping cond- 
Itions is met, which causes the program to return 
to Single-Step. 


QUICK TRACE allows changes to the stack, 
registers, stopping conditions, addresses to be 
displayed, and output destinations for ail this 
Information. All this can be done in Single-Step 
mode while running. 


Two optional display formats can show a sequence 
of operations at once. Usually, the information 
is given in four lines at the bottom of the screen. 


QUICK TRACE is completely transparent to the 
program being traced. It will not Interfere with 
the stack, program, or I/O. 


QUICK TRACE /s relocatable to any free part of 
memory. its output can be sent to any slot or to 
the screen. 


QUICK TRACE is completely compatible with 
programs using Applesoft and integer BASICs, 
graphics, and DOS. (Time dependent DOS 
operations can be bypassed.) It will display the 
graphics on the screen while QUICK TRACE is 
alive. 


QUICK TRACE Is a beautiful way to show the 
incredibly complex sequence of operations that 
a computer goes through in executing a program 


QutcK TRACE $50 


Is a trademark of Anthro-Digital, Inc. 
Copyright © 1981 
Written by John Rogers 


See these programs at participating Computerland and other 
fine computer stores. 


Anthro - Digital Software, Inc. 
P.O. Box 1385 Pittsfield, MA 01202 
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The "DW" directive in ToolKit does not recoa..ize multiple items 
separated by commas; therefore the ",SFFFF" was ignored. The 
following line in the source was "DW SFFFF". The S-C form ".DA 
LIT,S$FFFF" does assemble both items, so the S$FFFF constant was 
duplicated. 


The "DFB" directive in ToolKit recognizes multiple items. The 
conversion I did rendered the line into "L1495 .DA #$C1l,SDB", 
so the SDB item became a 16-bit value. I changed the line to 
"1495 .DA #$C1l,#SDB" and all was well. 


If you have a large Toolkit source to convert, chances are that 
you will find one or two more things to change that are not 
included above. Let me know what you come up with. 


As I mentioned earlier, the same general techniques work when 
you have a LISA file to convert. If you can get the source 
code on a text file, with all tokens expanded, then you can 
read it into S-C and begin converting. If you want a 
challenging assignment, how about writing a program which will 
read LISA type-B source files and convert them to S-C type-I 
source files, all automatically! 


Supercharge Your APPLE II* 


Plug-in compatibility 


320K bytes of RAM (200NS) memory designed 
to function like two 35 track floppy disk drives 


Compatible with Apple DOS 3.3 and Apple 
Pascal 1.1 


Same size as the Apple Disk II* Drive 


Invisible memory refresh - even with the Apple 
turned off 


ae Rechargeable battery system built-in to pro- 


the Apple il and Apple |! Plus® provides access 

speeds never before available. The Axlon memory Slot independent interface board draws no 
system is designed to interact with Apple DOS power from your Apple 

3.3* and Apple Pascal 1.1° like two standard flop- 

py disk drives while delivering the lightning fast All firmware i in static RAM on the interface 
access speeds of RAM memory. This also leaves board 

32K of RAM for advanced programming techni- 

ques. The interface board is siot independent and Includes software for diagnostic, fast load and 


draws no power from your Apple. The copy routines, and business applications 
rechargeable battery system built into the unit 
provides three hours of backup in the event of a 
power loss. Drop by your local Apple dealer or 170 N. Wolfe Road, 
contact Axton, Inc. for more information. 


Sunnyvale, CA 94086 


Trademark of Apple Computer. Inc 
Pascal 1s a Trademark of UCSD Regents (408) 730-0216 
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Correction to Bob's Fast Screen Scroll..........eeedJim Church 


If you tried the fast scroll from Bob Sander-Cederlof's article 
"Some Fast Screen Tricks" from the September issue, you might 
have been surprised. Bob goofed! 


He copied characters from line 16 into line 15 before moving 
line 15 to 14; ditto with lines 8, 7, and 6. This in spite of 
his special attempt to save lines on the stack. The problem is 
that he ran the ioop backwards from 119 to 0. If you change it 
to run from 0 up to 119, the scroll works correctly. 


Change lines 1410, 1620, and 1630, and add line 1625: 


1410 SCROLL LDY #0 


1620 .2 INY 
1625 CMP #120 
1630 BCC .1 


Bob, you are going to get a lot of mail (unless they are 
asleep) ! 


RAM/ROM PROGRAM DEVELOPMENT BOARD $35.00 
Plugs into any Apple slot. Holds one user-supplied 2Kx8 memory chip. Use a 6114 type RAM chip for 
program development or just extra memory. Plugin a programmed 2716 EPROM to keep your favorite routines 
‘on-line’. Maps into $CnO0-SCnFF and $C800-SCFFF memory space. Instructions & circuit diagram provided. 


The “MIRROR : Firmware for Apple-Cat $297.00 
Communications ROM plugs directly into Novation’s modem card. Three basic modes: Dumb Terminal, Remote 
Console & Programmable Modem. Added features include: Printer buffer, Pulse or Tone dialing, true 
dialtone detection, audible ring detect and ring-back option. Directly supports many 80-coluen boards 
(even while printing) and Apple’s Comm card commands. (Apple-Cat Hardware differences prevent 100/ 
interchangability with Conm card.) Includes Hayes-to-AppleCat register equivalances for software 
conversion. Telephone Software Connection (213-516-9430) has several programs which support the ‘MIRROR’. 


The ’“PERFORMER’ : Smarts For Your Printer $49.00 
Get the most from your smart printer by adding intelligence to your ‘dumb’ interface card. The PERFORMER 
Board plugs into any Apple slot for immediate access (no programs to find and load). Easily select 
printer fonts and many other features via a user-friendly menu. Replaces manual printer set-up. No need 
to remember ESC commands. Also provides TEXT and GRAPHICS screen dumps. Compatible with Apple, Tymac, 
Epson, Microtek and similar ’duab’ Centronics type parallel I/F boards. Specify printer: | EPSON MX80 
W/6raftrax-80, EPSON MX100, EPSON MXS0/MX100 W/Graftrax Plus, NEC 80238, C.I toh 8510 (ProWriter), OKI 
Nicroline 82A/83A W/OKIGRAPH, (OKI Bonus: The PERFORMER Generates ENHANCED and DOUBLE STRIKE Fonts) 


Avoid A $3.00 Shipping/Handl ing Charge By Mailing Full Payment With Order 
RAK -WA RE 
41 Ralph Road 
West Orange NJ Q7052 


#aat2 SAY YOU SAW IT IN “APPLE ASSEMBLY LINE’! sax 
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fered fc esverew —, leg besser aan orrpey 


500% 
FASTER con Pe iat coast 
THAN § TON as 

DOS 3.3 |g 


Transform 
your slow DOS 3.3 into 


HyperDOS 


with HOW FAST IS HYPERDOS? 
HyperDOS creater LOAD: DOS 3.3 HyperDOS 


A machine-languagGe Hi-Respicture 13.0sec. 3.1sec. 
program that MoOdi- 100sector 

fies the “in-memory binary program 24.0 sec. 5.6 sec. 
Image of DOS 3.53. pasic program 24.0 sec. 4.5 sec. 
1. Use HyperDos as your HELLO program. 

2. INITialize your new disks with HyperDOSs. 
5. Replace the old, slow DOS on your disks. 


FOR ONLY You eer aree tick 
HyperDOS CREATER on dis 
Us funds only $19 35 Requires 48K Apple II 
SoftKey Publishing PLUS 
Dept. AL a fully-commented source code listing 


P.O. Box 44549 
Tacoma, WA 98444 a FREE copy Of HARDCORE Computing 


(2%6) 531-16%- the magazine for serious Apple-users 
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Using USR for a WEEK cc ccc ccc ccc ccc cee cee ee eo DOD Sander-Cederlof 


The "&" and CALL statements are not the only ways to use 
machine language to enhance the Applesoft Language. USR iS a 
third way, and provides an easy way to return a Single value. 


How many times have you seen the Applesoft code "PEEK(X) + 
256* PEEK (X+1)"? It is used over and over again. What it does 
is look in memory at X and X+l for a 16-bit value (stored 
low-byte first as are most 16-bit values in the 6502 
environment). The high byte is multiplied by 256, and the low 
byte added in. Wouldn't it be nice to have a USR function 
which would convert a two-byte value directly? This function 
is sometimes called "WEEK", meaning "Word pEEK" (hence the 
awful pun in the title above). 


When I was in California last week someone categorically and 
unequivocally assured me that it is impossible to use the USR 
function with a value of 32768. I tried it with the WEEK 
function, and it works fine. So much for the assurances! I 
think his problem was that he followed the instructions in the 
Applesoft manual, which are somewhat incomplete. 


Here is the USR code, set up to run at $300. However, it is 
"run-anywhere" code, because there are no internal references, 
You do have to tell Applesoft where it starts, though. Line 
100 in the example shows how to do that. Location 1l and 12 
Must be set to the low- and high-bytes of the address of the 
USR code. 


1010 *---~---------------------------- 
1020 * USR (X) = PEEK (X)+256*PEEK (X+1) 
1030 *-------------------------------- 
1040 -OR $300 OR WHEREVER YOU WISH 
1050 *-------------------------------- 
0300- A5 9D 1060 USR LDA $9D CHECK RANGE 
0302- C9 91 +~=1070 CMP #$91 
0304- BO 18 1080 BCS .1 ERROR 
0306- 20 F2 EB 1090 JSR SEBF2 § CONVERT TO INTEGER IN $A0,Al 
0309- AS AO ~=——-:11100 LDA SAO PUT HIGH BYTE AFTER LOW BYTE 
030B- 85 A2 ~=1110 STA $A2 
030D- AO 01 ~=—_:11120 LDY #1 
030F- Bl Al 1130 LDA ($Al),Y HIGH-ORDER BYTE 
0311- 85 9E 1140 STA $9E HIGH BYTE OF MANTISSA 
0313- 88 1150 DEY 
0314- Bl Al =:1160 LDA ($Al),¥ LOW-ORDER BYTE 
0316- 85 9F 1170 STA S9F NEXT BYTE OF MANTISSA 
0318- 38 1180 SEC SIGN IS POSITIVE 
0319- A290 1190 LDX #$90 EXPONENT 2716 
031B- 4C AO EB 1200 JMP SEBAO FINISH CONVERSION 
031E- 4C 99 El 1210 1 JMP SE199 “ILLEGAL QUANTITY" MESSAGE 


100 POKE 11,0: POKE 12,3 

105 INPUT X: VTAB PEEK (37): PRINT X": "; 

110 PRINT USR (X)" = " PEEK (X) + 256 * PEEK (X + 1) 
120 GOTO 105 
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Automatic CATALOG in the Language Card ..........-.Bill Morgan 


It has been pointed out to me (loudly!) that I failed to 
mention the Language Card version of the Macro Assembler in my 
Automatic CATALOG routine last June. Well, here's what you 
need to do: 


Assemble the patch with an origin of SDF00. This is a 
blank page inside the assembler. 


BLOAD PATCH. 


SD46D:FF DE In the Language Card version, the Escape code 
Jump table is at $D467-D482. 


BSAVE S-C.ASM.MACRO.LC.MOD,ASD000,L$231F 


That should take care of it! 


APPLE EPROM PLUG™ 


@eREPLACE any or all Apple || ROMs with EPROMs with NO Apple modifi- 
cations. eCUSTOMIZE the F8 Autostart ROM to change prompt - change 
NMI, IRQ and Reset vectors to control any program. Other custom informa- 
tion furnished. SECURITY by putting Apple or program serial number etc., 
in “free” F8 ROM locations. COTHER FEATURES- Very small, 1 3/16”L x 
11/16"W x 5/16"H - no interference with language card in Slot #0 - up to 5” 
card in other slots without interference. 


SPECIAL LIMITED OFFER - Prime EPROM and programming 
for $10.00 plus $1.75 postage with EPROM PLUG purchase. 
TO ORDER: Send $14.95 plus $1.75 postage for each unit - VISA and 


Mastercard accepted. TO: MARTCOMM, INC., Dept. B, P.O. Box 74, 
Mopile. AL 36601 or call (205) 342-7259 after 6 PM CDT. 
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Another Lower Case Patch for S-C Macro.....&ub Sander-Cederlof 


Graeme Scott pointed out another oversight of mine. All lower 
case characters inside macro definitions are currently 
converted to upper case, whether or not you want it that way. 
The following patches will fix it, assuming you have already 
installed the patches from AAL August 1982 page 28. 


Motherboard version: $275E:BA 31 
Language Card version: SE8AA:06 F3 


I found another problem: "“.EM" and ".eM”" work, but ".em" and 
".Em" do not. The following patches make them work too. 


Motherboard version: 


$31DB:B9 00 02 C9 60 90 02 29 5F 60 
$2979:20 DB 31 


Language Card version: 


$F327:B9 00 02 C9 60 90 02 29 5F 60 
SEAC5:20 27 F3 


Writing for AAL.. cece cc ccc cccccceseseeeeess BOD Sander-Cederlof 


More and more of you are expressing interest in contributing 
articles to this newsletter. Fine with me! 


I accept them in almost any form. It is by far the best if any 
source programs are on disk in S-C format, so I don't have to 
type them in. Other formats are OK, but more trouble. 


I use my own word processor, which accepts standard DOS text 
files or Applewriter files. If you have a large article, a 
copy on disk saves a lot of time here. 


I receive more articles than I can use, but if yours is as good 
as you think it is, I will probably print it. I usually spend 
a lot of time checking the programs and editing the articles 
before I print them. 


Of course, I will return any disks you send. 


Apple Assembly Line is published monthly by S-C SOFTWARE CORPORATION, P.O. Box 
280300, Dallas, Texas 75228. Phone (214) 324-2050. Subscription rate is $15 
per year in the USA, sent Bulk Mail; add $3 for First Class postage in USA, 
Canada, and Mexico; add $13 postage for other countries. Back issues are 
available for $1.50 each (other countries add $1 per back issue for postage). 


All material herein is copyrighted by S-C SOFTWARE CORPORATION, all rights 
reserved. (Apple is a registered trademark of Apple Computer, Inc.) 
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